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"7 6o PROGRAM M ING SYSTEMS 



DP FIXED POINT LOAD 



QUALITY SOFTWARE 



DATE: February 1968 

ID CODE: BPX 

DRAWING: 391079 ( Rev B ) 

LABEL: DLD 

AUTHOR: STVL 

SOURCE: SYM I Assembly Language 

OBJECT: Relocatable 



PURPOSE 

To load a double precision fixed point argument from memory into the 
software registers MNT2, MNT3. 

USAGE 

Calling Sequence 

L-l SMB DLD 

L JSX DLD 

L + l D DARG 

Where DARG is the first of two words containing the number to be 
stored into the software registers. The routine will return to L+2 
with the contents of MNT2 in the hardware accumulator. 

Argument Description 

The argument will be two consecutive words of memory. 

Storage Requirements 

Three words of common storage: RET1, MNT2, MNT3. 

METHOD 

Indexed loads and direct stores constitute the entire logic. 



BPX - Continued 



RESTRICTIONS 



Entries 



DLD 



Other Routines 

None. 

External Constants 

None. 

Space Used 

8 words. 



Timing 
15 cycles 
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QUALITY SOFTWARE 



DATE: February 1968 

ID CODE: BPY 

DRAWING: 391081 (Rev B) 

LABEL: DST 

AUTHOR: STVL 

SOURCE: SYM I Assembly Language 

OBJECT: Relocatable 



PURPOSE 

To store in two consecutive memory words a double precision fixed 
point number fetched from the software registers MNT2, MNT3. 

USAGE 



Calling Sequence 

Where DARG is the first of two words into which the contents of the 
software registers will be stored. The routine will return to L+ 2 
with the contents of MNT2 in the hardware accumulator. 

L-l SMB DST 
L JSX DST 

L+l D DARG 

Argument Description 

The argument will be two consecutive words in memory. 

Storage Requirements 

Three words of common storage RET1, MNT2, MNT3. 

METHOD 

Direct loads and indexed stores constitute the entire logic. 

RESTRICTIONS 

Entries 

DST 



BPY - Continued Page 2 



Other Routines 

None 

External Constants 

None 

Space Used 

8 words 

Timing 

15 cycles 
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391081 (Revision B) 
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700 PROGRAM MING SYSTEMS 



DP FIXED POINT ADD, SUBTRACT 



QUALITY SOFTWARE 

DATE: February 1968 

ID CODE: BPZ 

DRAWING: 391083 (Rev C) 

LABEL: DAD, DSUB 

AUTHOR: STVL 

SOURCE: SYM I Assembly Language 

OBJECT: Relocatable 



PURPOSE 

To form the algebraic sum or difference of two double precision 
fixed point numbers set in the software registers MNT2, MNT3 
and in two consecutive words of memory. 

USAGE 

Calling Sequence 

The routine will return to L+2 with the result in the software 
registers MNT2, MNT3. 

L-l SMB DAD (or DSUB) 

L JSX DAD (or DSUB) 

L+l D DARG 
L+2 return 



Argument Description 

DARG is the first of two consecutive memory locations containing 
a fixed point double precision number. 

Both arguments must be in double precision format: The sign 
bit of the second word of both arguments must be set to zero. 

Storage Requirement s 

RET1 and pseudo-registers MNT2, MNT3 



BPZ - Continued Page 2 



METHOD 



DAD replaces the double register with the sum double register 

plus memory. 

DSUB replaces the double register with the differences double 
register minus memory. 

ERROR CONDITIONS 

An overflow will turn on the overflow flip flop, and carry the most 
significant bit of the sum or difference in the sign bit of the high 
word(MNT2). 

RESTRICTIONS : 
Entries 



DAD, DSUB 

Other Routines 

None 

External Constants 

Dl (decimal 1) 

M15R (15 bit mask) 

Space Used 

34 words of core. 
Timing 

Excluding calling sequence. 
DAD 24 + 1 cycles 
DSUB 23 + 1 cycles 
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70 PROGRAMMING SYSTEMS 



DP FIXED POINT TWO'S COMPLEMENT 



QUALITY SOFTWARE 



DATE: 

ID CODE: 

DRAWING: 

LABEL: 

AUTHOR: 

SOURCE: 

OBJECT: 



January 1968 

BLJ 

390664 (Rev C) 

D2C 

STVL 

SYM 1 Assembly Language 

Relocatable 



PURPOSE 

To form the two's complement of a two-word number set in the software 
Registers MNT2, MNT3. 

USAGE 

Calling Sequence 

The routine returnes to L+l after two's complementing the double 
precision word in the software registers MNT2, MNT3. 

SMB D2C 
L JSX D2C 
L+l Return 

Argument Description 

The argument is in the software registers MNT2, MNT3. 

Storage Requirements 

External storage in the software registers MNT2, MNT3. 

METHOD 

The contents of MNT3 is changed to its 2's complement, while the con- 
tents of MNT2 is changed to its l's complement, unless the lower word 
is zero, in which case the first word is set to its 2's complement. 



BLJ - Continued F* a ge 2 

RESTRICTIONS 

Entries 

D2C 

Other Routines 

None 

External Constants 

M15R (a mask of 15 bits, right adjusted) 

Space Used 

13 words 
Timing 

14 cycles 
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RAYTHEON 



70 PROGRAMMING SYSTEMS 



DOUBLE SHIFT ARITHMETIC 



QUALITY SOFTWARE 

DATE: February 1968 

ID CODE: BRA 

DRAWING: 391085 (Rev B) 

LABEL: DSR, DSL 

AUTHOR: STVL 

SOURCE: SYM I Assembly Language 

OBJECT: Relocatable 



PURPOSE 

To perform the arithmetic shift operation on a two-word 
argument. 

USAGE 



Calling Sequences 

SMB DSR 

JSX DSR, COUNT, ARGUMENT for a shift right 

SMB DSL 
or JSX DSL, COUNT, ARGUMENT for a shift left 

Where COUNT is any integer and ARGUMENT is the address 
of the first word of the two-word argument to be shifted. 

Argument Description 

The first argument must be an integer. The second argument will 
be treated as a double precision integer. 

Storage Requirements 

Two words of external storage labeled RET1, TMP1 are used. 

METHOD 



The Double Shift Routine creates two shift instructions depending upon 
the size of the count. The two -word argument is loaded into the ACR 
and the IXR (hardware accumulator and index registers) and the shifts 
are executed. The shift argument is stored back in memory. A shift 
count greater than 30 is replaced by 30. 
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RESTRICTIONS 

Entries 

DSL, DSR 

Other Routines 

None 

External Constants 

D15 (a constant equal to decimal 15) 

Space Used 

40 (X 1 28') words 

Timing 

DSR 54 cycles minimum 

70 cycles maximum 

62 cycles average 

DSL 55 cycles minimum 

71 cycles maximum 

63 cycles average 
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7()0 PROGRAMMING SYSTEMS 



MP FLOATING UNDERFLOW 



QUALITY SOFTWARE 

DATE: May 1968 

ID CODE: BSP 

DRAWING: 390014 (Rev B) 

LABEL: M. ZE 

AUTHOR: JACQ 

SOURCE: SYMI 

OBJECT: Relocatable in Block "MATH" 



PURPOSE 

To clear the three software registers MNT1, MNT2, MNT3. 

USAGE 

M. ZE is called by the library routines dealing with the mid -precision 
floating point format, when the software registers must be set to zero, 
as in the case of an underflow condition. 



Calling Sequence 



L-l SMB 


M. ZE 


L JSX 


M.ZE 


L+l Return 




RESTRICTIONS 




Loading 





M. ZE must be loaded in the same 2K block as the "MATH POOL". 

Other Routines 

None 

Space Used 

5 words 

Timing 

8 cycles 
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MP FLOATING UNDERFLOW 



Drawing No . 

390014 (Revision B) 
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700 PROGRAM MING SYSTEMS 



MP FLOATING OVERFLOW 



QUALITY SOFTWARE 

DATE: May 1968 

ID CODE: BSR 

DRAWING: 390015 (Rev B) 

LABEL: M.OV 

AUTHOR: JACQ 

SOURCE: SYM I 

OBJECT: Relocatable in Block "MATH" 



PURPOSE 

To flag an overflow condition in the overflow flag word OVFL, and to set 
the software registers MNT1, MNT2, MNT3 to the maximum magnitude 
of the mid -precision floating point format, keeping the sign as found in 
MNT2. 

USAGE 

M.OV is called by the library routines dealing with the mid-precision 
floating point format, when an overflow condition occurs. 

Calling Sequence 



L-1 


SMB 


M.OV 


L 


JSX 


M.OV 


L + l 


Return 




METHOD 







The flag word OVFL of the "MATH POOL" area is set to non-zero. 

RESTRICTIONS 

Loading 

M.OV must be loaded in the same 2k block as the "MATH POOL". 

Other Routines 
D2C 

Space Used 
11 words 

Timing 
21 cycles 
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Drawing No . 
390015 (Revision B) 



ID Code 



BSR 
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700 PROGRAMMING SYSTEMS 



MP FLOATING, DP FIXED MPY AND DIV. 



QUALITY SOFTWARE 

DATE: March 1968 

ID CODE: BRB 

DRAWING: 391096 (Revision D) 

LABEL: FMP, FDV, DMP, DDV 

AUTHOR: JACQ 

SOURCE: SYM I Assembly Language 

OBJECT: Relocatable 



PURPOSE 

DMP: To multiply two double precision fixed point numbers and return 
a double precision fixed point product. 

DDV: To divide a double precision fixed point number by another and 
return a double precision fixed point quotient. 

FMP: To multiply two mid-precision floating point numbers and 
return a mid-precision floating point 

FDV: To divide a mid-precision floating point number by another 
and return a mid-precision floating point quotient. 

USAGE 



Calling Sequence 

These routines will return to L+2 with the result in the software 
registers MNT1, MNT2, MNT3. 



L-1 


SMB 


DMP (DDV, FMP, FDV) 


L 


JSX 


DMP (DDV, FMP, FDV) 


L+l 


DATA 


ARG 


L+2 


Return 




Argument De 


scription 





Two arguments are necessary, one in the software registers and the 
other starting at the location ARG. 
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Storage Requirements 

External storage in RET2, RET3, TMP1, TMP2, TMP3, TMP4, 
TMP5, TMP6, OVFL, and the software registers MNT1, MNT2, MNT3. 

METHOD 



In an initial sequence common to the four entries, the algebraic sign of 
the result is secured, then both arguments are set to their absolute value. 

In a final sequence also common to all four entries, the result, quotient 
or product, is given its proper sign. 

Two -word division 



Let the dividend, divisor and quotient mantissae be N, D and Q. 



N = N 4 + 2- 45 .N 2 



D = Y, +2 



-15. 



In the floating point mode the exponent of the quotient is first 
computed. 

E Q = E N - E D + Bias 

In the fixed point mode the divisor is normalized to bit 1 of 
its high word, and the dividend is shifted the same amount to 
the left. 

The following condition is now satisfied: 
.5^Y 1 <1 



The dividend is then checked against the divisor. If it is not 
found smaller it is replaced by its difference with the divisor. 



N^> D 

N< D X = N 



X = N-D Q=£ +1 



D 



The condition: X < Y is now satisfied. 
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Let k = 2 



-15 



X Xj + k • Xz 

D " Y. 



1 + k Y. 



X X 1 + k • Xz 

D ~, 



1 -fcY 2 



^2 



- k" 



The remaining terms of the series are dropped. 



Let Q. + k §1 = 2£l_L^ 
Y 1 Y 4 



Xj + k . X ? O^QkI 

0^R 4 < Y 1 



X 
D 



-= Qi +-k y 



Rl 

1 



Y 



1 - k-^- + k 2 -i- 



F~ Ql +k ?l 



1 - k 



li 



LetQ 2 ..^ 



I k R2 R. - Qj . Y ? 0^Q 2 <1 

' " ~ Yx 

1 0^ R 2< ^ Y 4 



i = Qltl . Q2tk z5l^_« 



The expression (R,- - Q| . Y 2 ) is kept positive by decrementing Q^ 
by k or 2k if necessary. 

The expression (R 2 - Q 2 • Y 2 ) is not computed but only approximated 
to ± k^ . If it is found negative, Q 2 is decremented by k^. 

4 



X 



— =Q 1 +k-Q 2 +e e < k 



* k 2 
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The final quotient: 

Q = Q 1 + 2- 15 Q 2 +e If N < D 

Q = 1 + Q ± + 2 - 15 Q 2 + e IfN>D 

The unit bit is the sign bit of the high word. If it is used in the floating 
mode, the quotient mantissa is shifted 1 bit to the right. In that case 
the quotient exponent is incremented by 1. 

Before return to the caller the quotient is set to the sign secured initially. 

Two -word Multiplication 

Let the factor mantissae be X and Y, the product mantissa be P. 

x = x 1 + 2-1 5 x 2 

Y = Y 1 + 2-15 y 2 
In the floating point mode the exponent of the product is first computed. 
E = E x + E_, - Bias 

p X y 



Let k = 2 



•15 



X 



. Y = x 4 . y 4 .+ k(: 



X, . Y, + X- 



. yJ +k2x 2 • Y 2 



The last term is approximated to +_ k 2 /4 to force a carry into the lower 
word of the product. 



P = P 4 + k • P 2 + e 



e < k' 



In the floating mode the product is normalized to bit 1 of its high word. 
The product exponent is decremented by 1 if the mantissa has to be 
shifted. 



Before return to the caller the product is set to the sign secured 
initially. 
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ERROR CONDITIONS 

Error conditions are detected in the floating mode only. 

1) An attempt to divide by zero or by an unnormalized divisor 
will leave the dividend unaltered in the software register. 

2) An exponent overflow or underflow will give a quotient or 
product off by +256. 

In both cases the flag word "OVFL" is set to non-zero. No error 
message is given. 

RESTRICTIONS 

Except for zero, the routine cannot properly process data equal to 
their own 2's complement, which is the case of the negative limit: 

1st word 8000 (hexadecimal) 
2nd word 0000 

Entries 



DMP, DDV, FMP, FDV 

Other Routines 

ACMY, DAD, DIVS, D2C, MPYS 

External Constants 

B0, Dl, D128, D256, M8R, M15R, N\, N128 

Space U sed 

205 words 



391096D 
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Timing (in cycles) Average 

without hardware with hardware 

multiply and divide multiply and divide 



DMP 


332 


165 


DDV 


578 


241 


FMP 


370 


203 


FDV 


584 


247 



Deduct 20 cycles if both arguments are positive. 

ACCURACY 

29 bits 



391096D 
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Drawing No. 
391096 (Revision C) 
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RAYTHEON 



700 PROGRAMMING SYSTEMS 



MP FLOATING, DP FIXED COMPARE 



QUALITY SOFTWARE 

DATE: March 1968 

ID CODE: BRC 

DRAWING: 391088 (Rev B) 

LABEL: FCM, DCM 

AUTHOR: STVL 

SOURCE: SYM I Assembly Language 

OBJECT: Relocatable 



PURPOSE 



To compare an argument in memory, set either in mid precision 
floating point (FCM), or in double precision fixed point (DCM) form, 
to the number set, in the same format, in the pseudo-registers MNT1, 
MNT2, MNT3, (FCM) or MNT2, MNT3 (DCM). 

USAGE 

Calling Sequence 

L-l SMB FCM (DCM) 

L JSX FCM (DCM) 

L+l DATA ARG 

L+2 Return 

Storage Requirements 

External words RET 1, MNT1, MNT2, MNT3 

METHOD 

DCM: compare most significant words and if equal compare least 
significant words. 

FCM: if signs are different call DCM, otherwise compare exponents, 
if they are the same call DCM. 

Both routines exit with the machine comparison flip-flops set to indicate 
the results of the compare. Skip instructions (SEQ, SLE, SGR, etc.) 
should be used to test the results of the compare. 



BRC - Continued 



RESTRICTIONS 



Entries 



FCM, DCM 

Other Routines 

None 

External Constants 

None 

Space Used 

28 words 

Timing 

FCM 26 cycles 

DCM 15 cycles 
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